home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 17 / Developer Source Volume 17 (I-MODE Publications, Inc.)(2000).iso / delpp / fig27-07.gif < prev    next >
Graphics Interchange Format  |  1996-11-19  |  26.5 KB  |  640x480  |  4-bit (14 colors)
   ocr: Multi-Edit EX Eile Edit Block Search Text Macro Tools Window Tags Vos Help - CNDELPRO321B00KS24CHAP2ACHESTOR.SOL -X CONNECT C:iapidelphiyistudent. à gdb" USER "SYSDBA" PASSWORD "masterkey"; SET TERM A - CREATE PRUCEDURE COUNT REGISTERED STUDENTS RETURNS (REGISTERED STUDENTS INTEGER) AS BEGIN SELECT COUNT( (DISTINCT STUDENT ID) FRUM REGISIRATIUN INTO REGISTERED STUDENTS; ENDA CREATE SENERATUR STUDENT ID GENA SET GENERATUR STUDENT ID GEN TO 200* CREATE PROCEDURE GET NEW STUDENT ID RETURNS (NEW STUDENT ID INTEGER) AS BEGIN A L:1 C:1 Ins Caps Num Rec Start 5 Delphi32 Writing ED InterBa.. Multi-. - ...